CAADynamicalTime_CumulativeLeapSeconds <-
function(JD){.Call("CAADynamicalTime_CumulativeLeapSeconds", JD)}
